home *** CD-ROM | disk | FTP | other *** search
/ Aminet 13 / Aminet 13 - August 1996.iso / Aminet / mus / misc / TabulaturEd.lha / tabulatured / Install_TabulaturEd next >
Text File  |  1996-06-06  |  2KB  |  79 lines
  1. ; $VER: Install_TabulaturEd.script V1.00 (17.02.96)
  2. ; © 1995-96 bei Rolf Schaefer
  3.  
  4.  
  5. (set @language "deutsch")
  6.  
  7. (set MSG_SelectPath          "Wählen Sie bitte das Zielverzeichnis für TabulaturEd")
  8. (set MSG_InstallingFont      "Installiere jetzt die benötigten Fonts !!")
  9. (set MSG_Installing          "Welche Files soll ich installieren ? ")
  10. (set verzeichnis "68020")
  11.  
  12.  
  13. ; Welche CPU-Version soll installiert werden
  14.  
  15. (set cpuversion
  16.    (askchoice
  17.       (prompt "Welche Version möchten Sie installieren?")
  18.       (choices "68000 Version" "68020 Version")
  19.       (if (< (database "cpu") "68020")
  20.           (default 0)
  21.           (default 1)
  22.       )
  23.       (help "Wenn Sie einen Amiga mit einem 68020 Prozessor oder"
  24.             "höher haben, können sie diese Version installieren."
  25.             "Ansonsten installieren sie die 68000 Version "
  26.       )
  27.    )
  28. )
  29.  
  30. ((if (= cpuversion  0 ))
  31.       (set verzeichnis "68000")
  32.       (set verzeichnis "68020")
  33. )
  34. ; Frage nach dem Zielverzeichnis und kopiere die Files
  35.  
  36. (copyfiles
  37.   (prompt MSG_Installing)
  38.   (help @copyfiles-help)
  39.   (source  verzeichnis )
  40.   (set svcomdir
  41.               (askdir
  42.                      (prompt MSG_SelectPath)
  43.                      (help @askdir-help)
  44.                      (newpath)
  45.                      (default "SYS:TabulaturEd")
  46.               )
  47.   )
  48.   (dest svcomdir)
  49.   (all)
  50.   (confirm)
  51. )
  52.  
  53. (complete 70)
  54.  
  55.  
  56. (copyfiles
  57.   (help @copyfiles-help)
  58.   (source  "TabulaturEd.guide" )
  59.   (dest svcomdir)
  60. )
  61.  
  62. (copyfiles
  63.   (help @copyfiles-help)
  64.   (source   "TabulaturEd.guide.info" )
  65.   (dest svcomdir)
  66. )
  67.  
  68. (complete 70)
  69.  
  70.  
  71. (copyfiles
  72.   (prompt MSG_InstallingFont)
  73.   (help @copyfiles-help)
  74.   (source "Fonts")
  75.   (dest "SYS:Fonts")
  76.   (all)
  77.   (confirm)
  78. )
  79.